home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Windows Expert
/
Windows Expert.iso
/
windownt
/
perlnt.zip
/
t
/
diffnt.cmd
next >
Wrap
OS/2 REXX Batch file
|
1993-07-25
|
340b
|
20 lines
@rem = '-*- Perl -*-';
@rem = '
@echo off
perl -S %0.cmd %1 %2 %3 %4 %5 %6 %7 %8 %9
goto endofperl
';
@tests = <base/*.nt cmd/*.nt comp/*.nt io/*.nt lib/*.nt op/*.nt>;
$| = 1;
foreach $test (@tests) {
$old = $test;
$old =~ s/\.nt$/\.t/;
print "diff $old $test\n";
system "diff -c $old $test";
}
__END__
:endofperl